-- This file is just a sandbox to test commands it does nothing
COPYRIGHT = string.uchar(0xa9)
DEGREE = string.uchar(0xb0)
SUPER_2 = string.uchar(0xb2)
SUPER_3 = string.uchar(0xb3)
MICRO = string.uchar(0xb5)
ARING = string.uchar(0xc5)
SUBSCRIPT_2 = string.uchar(0x2082)
NEGATIVE = string.uchar(0x2212)
PLACE_OF_INTEREST = string.uchar(0x2318)
EE = string.uchar(0xf000)
loc=locale.name()

function v()
	return 1
end
function text()
	return math.eval('Text str,0')
end

menu = {
    {"Água", -- H20
       {"Procurar por P e/ou T",text},
       {"Procurar por h e P",text},
       {"Procurar por s e P (Tabela)", v},
       {"Procurar por s e P (Liquido Saturado)", v},
	   {"Procurar por v e P",v},
	   {"Procurar por u e P",v}
	},
    {"Amónia", -- ammonia
       {"Procurar por P e/ou T", v},
       {"Procurar por h e P", v},
       {"Procurar por s e P(Tabela)", v},
       {"Procurar por s e P(Liquido Saturado)", v},
	   {"Procurar por v e P",v},
	   {"Procurar por u e P",v}
	},
    {"Refrigerante R22", --R22
       {"Procurar por P e/ou T", v},
       {"Procurar por h e P", v},
       {"Procurar por s e P(Tabela)", v},
       {"Procurar por s e P(Liquido Saturado)", v},
	   {"Procurar por v e P",v},
	   {"Procurar por u e P",v}
	},
    {"Refrigerante R134a", --R134a
       {"Procurar por P e/ou T", v},
       {"Procurar por h e P", v},
       {"Procurar por s e P(Tabela)", v},
       {"Procurar por s e P(Liquido Saturado)", v},
	   {"Procurar por v e P",v},
	   {"Procurar por u e P",v}
	},
    {"Propano", --Propane
       {"Procurar por P e/ou T", v},
       {"Procurar por h e P", v},
       {"Procurar por s e P(Tabela)", v},
       {"Procurar por s e P(Liquido Saturado)", v},
	   {"Procurar por v e P",v},
	   {"Procurar por u e P",v}
	},
    {"Massas Molares e R's", --Molar masses
       {"Acetylene", v},
       {"Air (equivalent)", v},
       {"Ammonia", v},
       {"Argon", v},
	   {"Benzene",v},
	   {"Carbon",v},
	   {"Carbon dioxide",v},
	   {"Carbon monoxide",v},
	   {"Copper",v},
	   {"Ethane",v},
	   {"Ethyl alcohol",v},
	   {"Ethylene",v},
	   {"Helium",v},
	   {"Hydrogen",v},
	   {"Methane",v},
	   {"Methyl alcohol",v},
	   {"Octane",v},
	   {"Oxygen",v},
	   {"Propane",v},
	   {"Propylene",v},
	   {"Refrigerant 12",v},
	   {"Refrigerant 22",v},
	   {"Refrigerant 134a",v},
	   {"Sulfur dioxide",v},
	   {"Water",v}
	},
	{"Calor Específico",
	{"Procurar por T",v},
	{"Procurar por cp",v},
	{"Procurar por cv",v},
	{"Procurar por cp/cv",v},
	{"Ver Tabela",v}
	}
}
toolpalette.register(menu)
function on.paint(gc)
	gc:drawString("v = " .. v() .. "m" .. SUPER_3 .. "/kg",10,10,"top")
	gc:drawString("locale=" .. loc,10,30,"top")
end

function on.create()
	--Pressure in MPa
	p = 0.1
	--Temperature in MPa
	t = 300
	var.store("pressure",p)
	var.store("temperature",t)
	var.monitor("pressure")
	var.monitor("temperature")
end

function on.varChange(list)
	p = var.recall("pressure")
	t = var.recall("temperature")
	platform.window:invalidate()
end

function v ()
	return 1
end
